Define Class taCollection As Collection

	Procedure Clear() As VOID
		This.Remove(-1)
	EndProc  

EndDefine 
